-- stack: in
-- format: 8 (HyperCard 1)
-- flags: 0x0 (none)
-- protect password hash: 0
-- maximum user level: 5 (scripting)
-- window: Rect(x1=0, y1=0, x2=0, y2=0)
-- screen: Rect(x1=0, y1=0, x2=0, y2=0)
-- card dimensions: w=0 h=0
-- scroll: x=0 y=0
-- background count: 6
-- first background id: 3405
-- card count: 8
-- first card id: 3925
-- list block id: 3769
-- print block id: 9202
-- font table block id: 0
-- style table block id: 0
-- free block count: 0
-- free size: 0 bytes
-- total size: 184416 bytes
-- stack block size: 3584 bytes
-- created by hypercard version: 0x00000000
-- compacted by hypercard version: 0x00000000
-- modified by hypercard version: 0x00000000
-- opened by hypercard version: 0x00000000
-- patterns[0]: 0x0000000000000000
-- patterns[1]: 0x8000000008000000
-- patterns[2]: 0x8800220088002200
-- patterns[3]: 0x8888222288882222
-- patterns[4]: 0x88AA22AA88AA22AA
-- patterns[5]: 0xCCAA33AACCAA33AA
-- patterns[6]: 0xEEAABBAAEEAABBAA
-- patterns[7]: 0xEEBBBBEEEEBBBBEE
-- patterns[8]: 0xFFBBFFEEFFBBFFEE
-- patterns[9]: 0xFFBBFFFFFFBBFFFF
-- patterns[10]: 0x8010022001084004
-- patterns[11]: 0xFFFFFFFFFFFFFFFF
-- patterns[12]: 0x8822882200008822
-- patterns[13]: 0x1122448811224488
-- patterns[14]: 0xC4800C6843023026
-- patterns[15]: 0xB130031BD8C00C8D
-- patterns[16]: 0xAA00AA00AA00AA00
-- patterns[17]: 0x8822552288225522
-- patterns[18]: 0x8855225588552255
-- patterns[19]: 0x77DD77DD77DD77DD
-- patterns[20]: 0x8000000000000000
-- patterns[21]: 0xAA55AA55AA55AA55
-- patterns[22]: 0x038448300C020101
-- patterns[23]: 0x8244394482010101
-- patterns[24]: 0x8814224188412214
-- patterns[25]: 0x8080413E080814E3
-- patterns[26]: 0x22048C7422179810
-- patterns[27]: 0xBE808808EB088880
-- patterns[28]: 0x25C8328964244C92
-- patterns[29]: 0xA29C41BE2AC914EB
-- patterns[30]: 0x40A00000040A0000
-- patterns[31]: 0x8040200002040800
-- patterns[32]: 0xAA00800088008000
-- patterns[33]: 0xFF80808080808080
-- patterns[34]: 0x081C22C180010204
-- patterns[35]: 0xFF808080FF080808
-- patterns[36]: 0xF87422478F172271
-- patterns[37]: 0xBF00BFBFB0B0B0B0
-- patterns[38]: 0xFF7FBE5DA2418000
-- patterns[39]: 0xFAF5FAF5A050A050
-- checksum: 0x0
----- HyperTalk script -----
on openStack
  global usrlvl, temp, menu1,list1,list2
  put "Front Panel,Inside-Front Panel,Inside-Back Panel,Back Panel" into list1
  put "Inside Right-Left,Back-Front Panels" into list2
  put "Home,Full-Page Paint,Clip Art,Art Ideas,Finder" into temp
  hide menuBar
  set the visible of bkgnd field "toggle" to false
  get userLevel
  put it into usrlvl
  if value(usrlvl) < 3 then set userLevel to 3
end openStack

on closeStack
  global usrlvl, menu1
  show menuBar
  show bkgnd field "toggle"
  put "" into msg
  hide message
  set userLevel to value(usrlvl)
end closeStack

on tabKey
  if the visible of card field "Control" is false then
    show card field "Control"
    show button Help
    show button Home
    show button New
    show button Delete
    show button Print
    show button Menus
    show button Prev
    show button Next
    show button Scroll
    show button note
  else
    hide card field "Control"
    hide button Help
    hide button Home
    hide button New
    hide button Delete
    hide button Print
    hide button Menus
    hide button Prev
    hide button Next
    hide button Scroll
    hide button note
  end if
end tabKey

on enterKey
  if the optionKey is down then
    click at loc of card button "Help"
  else
    if the visible of bkgnd field topRule is true then
      hide bkgnd field topRule
      hide bkgnd field bottomRule
    else
      show bkgnd field topRule
      show bkgnd field bottomRule
    end if
  end if
end enterKey

on arrowKey whichKey
  if (whichKey="Up" or whichKey="Down") then
    send mouseUp to card button "Scroll"
  end if
  if whichKey="Right" then send mouseUp to card button "Next"
  if whichKey="Left" then send mouseUp to card button "Prev"
end arrowKey